home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / GWAda 1.5.1 / GW-Ada⁄Ed-MacProgs / GWU Demos / io_libs.lis < prev    next >
Encoding:
File List  |  1994-01-09  |  567 b   |  21 lines  |  [TEXT/GADA]
  1. NYU Ada/ED-C 1.11.1  Macintosh System 7.0  Sun   9 Jan 1994  17:32:18  PAGE    1
  2.  
  3.  
  4.    1:   -- Precompiled instantiations of Integer_IO and
  5.    2:   -- Float_IO for the predefined Integer and Float types
  6.    3:    
  7.    4:   WITH Text_IO;
  8.    5:   PACKAGE My_Int_IO IS
  9.    6:     NEW Text_IO.Integer_IO (Num => Integer);
  10.    7:    
  11.    8:   WITH Text_IO;
  12.    9:   PACKAGE My_Flt_IO IS
  13.   10:     NEW Text_IO.Float_IO   (Num => Float);
  14.   11:   
  15.   12:   WITH Text_IO;
  16.   13:   PACKAGE Boolean_IO IS 
  17.   14:     NEW Text_IO.Enumeration_IO (Enum => Boolean);
  18.  
  19.  
  20.     No errors detected
  21.